#include <iostream>
#include <vector>
#include <string>

int main() {
    std::vector<std::string> a;
    std::string input;
    std::getline(std::cin, input);
    std::string word = "";

    for(char c : input) {
        if (c == ' ') {
            a.push_back(word);
            word = "";
        } else {
            word += c;
        }
    }
    a.push_back(word);

    int k = 3;
    int b = 0;
    std::vector<std::string> kr = {"а", "б", "в", "г", "д", "е", "ё", "ж", "з", "и", "й", "к", "л", "м", "н", "о", "п", "р", "с", "т", "у", "ф", "х", "ц", "ч", "ш", "щ", "ъ", "ы", "ь", "э", "ю", "я"};
    std::vector<std::string> lt = {"A", "E", "I", "O", "U", "Y", "B", "C", "D", "F", "G", "H", "J", "K", "L", "M", "N", "P", "Q", "R", "S", "T", "V", "W", "X", "Z"};
    std::vector<std::string> s1, s2, s3, s4, s5;

    for (std::string i : a) {
        if (i[0] != std::tolower(i[0])) {
            if (std::find(kr.begin(), kr.end(), std::string(1, std::tolower(i[0]))) != kr.end()) {
                s1.push_back(i);
            } else {
                continue;
            }

            for(size_t e = 0; e < i.size(); ++e) {
                if (std::find(lt.begin(), lt.end(), std::string(1, std::toupper(i[e]))) != lt.end()) {
                    s2.push_back(i);
                    break;
                }
            }
        }
    }

    for (std::string i2 : a) {
        if (i2.size() <= k) {
            s3.push_back(i2);
        }

        if (i2.size() > b) {
            b = i2.size();
        }
    }

    for (std::string i3 : a) {
        if (i3.size() == b) {
            s4.push_back(i3);
        }
    }

    for (std::string i4 : a) {
        for(size_t e = 0; e < i4.size(); ++e) {
            if (i4[e] == '-') {
                s5.push_back(i4);
                break;
            }
        }
    }

    if (a.size() > 1) {
        std::cout << "Кол-во слов: " << a.size() << std::endl;
        std::cout << "Кол-во слов с заглавной кириллической буквы: " << s1.size() << std::endl;
        std::cout << "Кол-во слов содержащих латинский символ: " << s2.size() << std::endl;
        std::cout << "Кол-во слов не превышающих 3 символа: " << s3.size() << std::endl;
        std::cout << "Кол-во слов в составе которых имеется дефис: " << s5.size() << std::endl;
        std::cout << "Самое длинное слово: " << s4[0] << std::endl;
        std::cout << "Длина слова: " << b << std::endl;
    } else {
        std::cout << "Мало данных для анализа" << std::endl;
    }

    return 0;
}
